type token = 
	| Number of int
	| Add
	| Sub
	| Mul
	| Div
	| Eof
	| Error of string;;
